5.1. Yksinkertaisia esimerkkiohjelmia
Seuraavassa koodiesimerkissä esitellään yksinkertainen Tk-kielinen ohjelma nimeltään Hello World (kuva 5.2).
#!/usr/local/bin/wish
button .b -text "Hello, world!" -command exit
pack .b
Ohjelma luo ikkunan, johon sijoitetaan painike sisältäen tekstin Hello World. Painiketta painettaessa sovellus lopetetaan exit-komennon avulla. exit-komento on Tcl-kielinen komento, joka esiteltiin luvussa 4.12.
Kuva 5.2. Hell o World! -esimerkki.
Koodissa olevat käskyt ja parametrit tarkoittavat seuraavaa:
|
#!/usr/local/bin/wish |
hakemisto, jossa wish-tulkki sijaitsee, |
|
button |
painikeohjain, |
|
.b |
ohjaimen nimi, |
|
-text |
optio, teksti painikkeessa, |
|
"Hello, world!" |
ohjaimeen kirjoitettava teksti, |
|
-command |
optio, painettaessa suoritettava komento, |
|
exit |
suoritettava komento ja |
|
pack .b |
ohjaimen pakkaaminen kuvaruudulle. |
Liitteessä 3 esitellään edellistä esimerkkiä laajempi Tcl/Tk-kielillä ohjelmoitu autolaskuri-ohjelma, josta saa käsityksen käyttöliittymän ohjelmoinnista Tk-kielellä (kuva 5.3).
Kuva 5.3. Autolaskuri-esimerkki.
Autolaskuri-ohjelmalla voi laskea ohimenevien henkilö- ja kuorma-autojen lukumäärän. Laskimen kahta painiketta painetaan aina, kun henkilöauto tai kuorma-auto menee ohi. Tällöin henkilöautojen tai vastaavasti kuorma-autojen lukumäärä lisääntyy yhdellä. Näytöllä on myös painike, jonka avulla voi nollata laskurit. Valikossa on ainoana vaihtoehtona ohjelmasta poistuminen. Sovellukseen on mä&a uml;ritelty painikkeita vastaavat näppäimet. Näppäimistön h-painike vastaa Henkilöautoja-painiketta, k-painike Kuorma-autoja -painiketta ja n-painike Nollaa-painiketta.
Liitteen 3 autolaskuri-ohjelmaa voi kokeilla esimerkiksi Jyväskylän yliopiston koneissa math.jyu.fi, silmu.jyu.fi ja tukki.jyu.fi koneissa.
